home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / letters / mvletter.sty < prev   
Text File  |  1991-11-13  |  15KB  |  440 lines
  1. % - kleinere Korrekturen, Martin Wunderli, 25.4.1991, 20.7.1991
  2. % - an schweizer Sichtumschlge und eigene Bedfrnisse angepat, Martin
  3. %   Wunderli, 29. Mrz 1991. Es wird die Benutzung des DINA4-Style
  4. %   vorausgesetzt.
  5. % - die Namensangaben gegen meine eigenen ausgetauscht, Stefan Lindner 16-Jun-89
  6. % - modifiziert fuer eigene Beduerfnisse, Lutz Birkhahn 06-Apr-89
  7. %   Ideen kommen von H. Kopka (LaTeX -- Eine Einfuehrung), vielen durch-
  8. %   gesehenen Briefen und von meinem Kopf...
  9. %   HINWEIS: Dieser Style war urspruenglich nur fuer meinen privaten
  10. %   Gebrauch bestimmt, deshalb ist die Dokumentation und Kommentierung
  11. %   auch recht spaerlich. Es war mal geplant, eine Style-Option "private"
  12. %   zu unterstuetzen, bisher wird jedoch nur ein \if-Makro definiert
  13. %   (\if@private), aber nirgends abgefragt... Wer das Buch von Kopka hat,
  14. %   kann dort eine wesentlich ausfhrlichere Beschreibung lesen.
  15. % - letter.sty 20-Jan-88
  16.  
  17. % Fr Leute, die DINA4.STY nicht haben:
  18. % DINA4-Format
  19. %\oddsidemargin 6pt\evensidemargin 6pt\marginparwidth 48pt\marginparsep 10pt 
  20. %\topmargin -18pt\headheight 12pt\headsep 25pt\footheight 12pt\footskip 30pt 
  21. %\textheight 625pt\textwidth 431pt\columnsep 10pt\columnseprule 0pt 
  22.  
  23. \typeout{Document Style `mwletter' <20 Juli 91>.}
  24. \typeout{Bearbeitung fuer: Martin Wunderli}
  25.  
  26. \def\@ptsize{0} \@namedef{ds@11pt}{\def\@ptsize{1}}
  27. \@namedef{ds@12pt}{\def\@ptsize{2}}
  28. \@twosidefalse
  29. \def\ds@draft{\overfullrule 5pt}
  30. \newif\if@german \@germanfalse
  31. \def\ds@german{\@germantrue}
  32. \newif\if@private \@privatefalse
  33. \def\ds@private{\@privatetrue}
  34. \@options
  35.  
  36. \if@german\input german.sty \relax\fi
  37.  
  38. \lineskip 1pt \normallineskip 1pt
  39. \def\baselinestretch{1}
  40.  
  41. \ifcase \@ptsize\relax
  42. \def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
  43. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  44. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt
  45. minus3pt\let\@listi\@listI}
  46. \def\small{\@setsize\small{11pt}\ixpt\@ixpt
  47. \abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip
  48. \abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus
  49. 2pt\def\@listi{\leftmargin\leftmargini \topsep 4pt plus 2pt minus 2pt\parsep
  50. 2pt plus 1pt minus 1pt
  51. \itemsep \parsep}}
  52. \def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
  53. \abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  54. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus
  55. 2pt\def\@listi{\leftmargin\leftmargini \topsep 3pt plus 1pt minus 1pt\parsep
  56. 2pt plus 1pt minus 1pt
  57. \itemsep \parsep}}
  58. \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
  59. \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
  60. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  61. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  62. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  63. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  64. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  65. \or
  66. \def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt
  67. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  68. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  69. minus3pt\let\@listi\@listI}
  70. \def\small{\@setsize\small{12pt}\xpt\@xpt
  71. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  72. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt
  73. minus3pt\def\@listi{\leftmargin\leftmargini \topsep 6pt plus 2pt minus
  74. 2pt\parsep 3pt plus 2pt minus 1pt
  75. \itemsep \parsep}}
  76. \def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt
  77. \abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  78. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
  79. 2pt\def\@listi{\leftmargin\leftmargini \topsep 4pt plus 2pt minus 2pt\parsep
  80. 2pt plus 1pt minus 1pt
  81. \itemsep \parsep}}
  82. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  83. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  84. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  85. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  86. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  87. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  88. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  89. \or
  90. \def\@normalsize{\@setsize\normalsize{15pt}\xiipt\@xiipt
  91. \abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
  92. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  93. minus3pt\let\@listi\@listI}
  94. \def\small{\@setsize\small{13.6pt}\xipt\@xipt
  95. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  96. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  97. minus3pt\def\@listi{\leftmargin\leftmargini \parsep 4.5pt plus 2pt minus 1pt
  98.  \itemsep \parsep
  99.  \topsep 9pt plus 3pt minus 5pt}}
  100. \def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
  101. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  102. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt
  103. minus3pt\def\@listi{\leftmargin\leftmargini \topsep 6pt plus 2pt minus
  104. 2pt\parsep 3pt plus 2pt minus 1pt
  105. \itemsep \parsep}}
  106. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  107. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  108. \def\large{\@setsize\large{18pt}\xivpt\@xivpt}
  109. \def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
  110. \def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
  111. \def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
  112. \let\Huge=\huge
  113. \fi
  114. \normalsize
  115.  
  116. \oddsidemargin 5mm \evensidemargin 5mm
  117. \marginparwidth 90pt \marginparsep 11pt \marginparpush 5pt
  118. \topmargin -14mm \headheight 30pt \headsep 20pt \footheight 12pt \footskip 20pt
  119. \textheight 21cm \textwidth 14.8cm \columnsep 10pt \columnseprule 0pt
  120. \raggedbottom
  121. \footnotesep 12pt \skip\footins 10pt plus 2pt minus 4pt
  122. \floatsep 12pt plus 2pt minus 2pt
  123. \textfloatsep 20pt plus 2pt minus 4pt
  124. \intextsep 12pt plus 2pt minus 2pt
  125. \dblfloatsep 12pt plus 2pt minus 2pt
  126. \dbltextfloatsep 20pt plus 2pt minus 4pt
  127. \@maxsep 20pt
  128. \@dblmaxsep 20pt
  129. \@fptop 0pt plus 1fil
  130. \@fpsep 8pt plus 2fil
  131. \@fpbot 0pt plus 1fil
  132. \@dblfptop 0pt plus 1fil
  133. \@dblfpsep 8pt plus 2fil
  134. \@dblfpbot 0pt plus 1fil
  135.  
  136.  
  137. % \newdimen\longindentation
  138. % \longindentation=.5\textwidth
  139. % \newdimen\indentedwidth
  140. % \indentedwidth=\textwidth
  141. % \advance\indentedwidth -\longindentation
  142.  
  143. \newlength{\rightfield}  \rightfield=63mm
  144. \newlength{\leftfield}   \leftfield=\textwidth
  145.                          \advance\leftfield by -\rightfield
  146. \newlength{\hackleftfield} \hackleftfield=\leftfield
  147.                            \advance\hackleftfield by -1.5mm
  148.  
  149. \newsavebox{\firm}      \newsavebox{\firmaddress}
  150. \newsavebox{\firmreturn}
  151.  
  152. \sbox{\firm}{\normalsize\rm Martin Wunderli}
  153.  
  154. \sbox{\firmaddress}{
  155.   \footnotesize
  156.     \begin{minipage}{\hackleftfield}
  157.       \sc
  158.       Martin Wunderli\\
  159.       Eschenweg 7\\
  160.       CH--8057 Z\"urich
  161.     \end{minipage}
  162.     \begin{minipage}{\rightfield}
  163.       \begin{tabbing}
  164.         Internet: \= \kill
  165.         Telefon:  \> 01/311 89 03\\
  166.         Internet: \> martin.wunderli@dp.ethz.ch\\
  167.         Fidonet:  \> 2:302/815.25
  168.       \end{tabbing}
  169.     \end{minipage}
  170. }
  171.  
  172. \sbox{\firmreturn}
  173.   {\underline{\viipt\rm Martin Wunderli $\cdot$ Eschenweg 7 $\cdot$ CH--8057 Z\"urich}}
  174.  
  175. \def\to@label#1#2{\setbox0\vbox{\xiipt\rm\parbox{\leftfield}{#1}\\{#2}}
  176.    \vbox to 3cm{\vss \box0 \vss}}
  177.  
  178. %In diesem Absatz sind Aenderungen vorzunehmen:
  179. \def\opening#1{
  180.    \thispagestyle{firstpage}
  181.  
  182.    \makebox[\leftfield][l]{}
  183.    \parbox[t]{\rightfield}{\usebox{\firmreturn}\\
  184.       \to@label{\ifx\@specialmail\@empty \toname
  185.                 \else\underline{{\bf\@specialmail}}\\[1ex]\toname\fi}
  186.                {\toaddress}}
  187.          
  188.    \vspace{1cm}
  189.    \parbox[t]{\leftfield}{
  190.       \ifx\@ymail\@empty
  191.         \ifx\@yref\@empty
  192.           \ifx\@subject\@empty
  193.             \makebox[\leftfield][l]{}
  194.           \else
  195.             \makebox[\leftfield][l]{}\\[7mm]
  196.           \fi
  197.         \else
  198.           \makebox[\leftfield][l]{\@yref}\\[7mm]
  199.         \fi
  200.       \else
  201.         \makebox[\leftfield][l]{\@ymail \hfill \@yref \hfill}\\[7mm]
  202.       \fi
  203.                                                                       %\makebox[0pt][r]{---\hspace{1.6cm}}
  204.       \ifx\@subject\@empty
  205.         \makebox[\leftfield][l]{}
  206.       \else
  207.         \makebox[\leftfield][l]{\@subject}
  208.       \fi}
  209.    \@date\par
  210.    \vspace{4\parskip}
  211.    #1\par\nobreak
  212. }
  213.  
  214. \long\def\closing#1{\par\nobreak\vspace{\parskip}
  215.  \stopbreaks
  216.  \noindent
  217.  {\raggedright
  218.  \ignorespaces #1\\[6\medskipamount] \ifx\@empty\fromsig
  219.  \fromname
  220.  \else \fromsig \fi\strut}
  221.  \par}
  222.  
  223. \def\ps{\par\startbreaks}
  224. \def\cc#1{\par\noindent
  225.    \parbox[t]{\textwidth}{\@hangfrom
  226.       {\rm\if@german Verteiler: \else cc: \fi}\ignorespaces #1\strut}\par}
  227. \def\encl#1{\par\noindent
  228.    \parbox[t]{\textwidth}{\@hangfrom
  229.       {\rm\if@german Anlagen: \else encl: \fi}\ignorespaces #1\strut}\par}
  230. \def\stopletter{}
  231.  
  232. \if@german
  233.    \def\yref#1{\def\@yref{\parbox[t]{.5\leftfield}
  234.       {\scriptsize Ihre Zeichen:\\ \normalsize #1}}}
  235.    \def\ymail#1{\def\@ymail{\parbox[t]{.5\leftfield}
  236.       {\scriptsize Ihre Nachricht vom:\\ \normalsize #1}}}
  237.    \def\subject#1{\def\@subject{{\bf #1}}}
  238. \else
  239.    \def\yref#1{\def\@yref{\parbox[t]{.5\leftfield}
  240.       {\scriptsize Your Ref.:\\ \normalsize #1}}}
  241.    \def\ymail#1{\def\@ymail{\parbox[t]{.5\leftfield}
  242.       {\scriptsize Your Mail's Date:\\ \normalsize #1}}}
  243.    \def\subject#1{\def\@subject{{\sl Subject\/}: #1}}
  244. \fi
  245. \def\@yref{} \def\@ymail{} \def\@myref{} \def\@subject{}
  246.  
  247. \def\specialmail#1{\def\@specialmail{#1}}
  248. \def\@specialmail{}
  249. \def\email#1{\def\@email{#1}}
  250. \def\@email{}
  251. \def\mailbox#1{\def\@mailbox{#1}}
  252. \def\@mailbox{}
  253.  
  254. \def\returnaddress{}
  255. \newcount\labelcount
  256.  
  257. \def\startlabels{\labelcount=0 \baselineskip=0pt \lineskip=0pt
  258. \pagestyle{empty}
  259. \let\@texttop=\relax
  260. \topmargin -50pt
  261. \headsep 0pt
  262. \oddsidemargin -35pt
  263. \evensidemargin -35pt
  264. \textheight 10in
  265. \@colht\textheight \@colroom\textheight \vsize\textheight
  266. \textwidth 550pt
  267. \columnsep 25pt
  268. \xpt
  269. \baselineskip=0pt
  270. \lineskip=0pt
  271. \boxmaxdepth=0pt
  272. \parindent=0pt \twocolumn\relax}
  273. \def\mlabel#1#2{\setbox0\vbox{\parbox[b]{3.6in}{\strut\ignorespaces #2}}
  274.  \vbox to 2in{\vss \box0 \vss}}
  275.  
  276.  
  277. \long\def\letter#1{\newpage
  278.  \c@page\@ne
  279.  \interlinepenalty=200 \@processto{#1}}
  280. \def\endletter{\stopletter\@@par\pagebreak\@@par
  281.  \if@filesw
  282.  \begingroup
  283.  \def\protect{\string}
  284.  \let\\=\relax
  285.  \def\protect##1{\string##1\space}
  286.  \immediate\write\@auxout{\string\mlabel{\returnaddress}{\toname
  287.  \\\toaddress}}
  288.  \endgroup
  289.  \fi}
  290. \long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty
  291.  \else \@yproc #1@@@\fi}
  292. \long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}
  293. \long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}
  294. \def\stopbreaks{\interlinepenalty \@M
  295.  \def\par{\@@par\nobreak}\let\\=\@nobreakcr
  296.  \let\vspace\@nobreakvspace}
  297. \def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}
  298. \def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else
  299.  \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}
  300. \def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}
  301. \def\startbreaks{\let\\=\@normalcr
  302.  \interlinepenalty 200\def\par{\@@par\penalty 200}}
  303. \def\name#1{\def\fromname{#1}}
  304. \def\fromname{}
  305. \def\signature#1{\def\fromsig{#1}}
  306. \def\fromsig{}
  307. \long\def\address#1{\def\fromaddress{#1}}
  308. \def\fromaddress{}
  309. \def\location#1{\def\fromlocation{#1}}
  310. \def\fromlocation{}
  311. \def\telephone#1{\def\telephonenum{#1}}
  312. \def\telephonenum{}
  313. \def\document{\endgroup
  314.  \@colht\textheight \@colroom\textheight \vsize\textheight
  315.  \columnwidth\textwidth \@clubpenalty\clubpenalty
  316.  \if@twocolumn \advance\columnwidth -\columnsep
  317.  \divide\columnwidth\tw@ \hsize\columnwidth \@firstcolumntrue
  318.  \fi
  319.  \hsize\columnwidth \linewidth\hsize
  320.  \begingroup\@floatplacement\@dblfloatplacement\endgroup
  321.  \if@filesw \immediate\openout\@mainaux=\jobname.aux
  322.  \immediate\write\@mainaux{\string\startlabels\string\@startlabels}\fi
  323.  \def\do##1{\let ##1\@notprerr}
  324.  \@preamblecmds
  325.  \let\do\noexpand
  326.  \@normalsize\everypar{}}
  327. \def\enddocument{\@checkend{document}\newpage\begingroup
  328. \if@filesw \immediate\closeout\@mainaux
  329. \makeatletter\input \jobname.aux\clearpage
  330. \fi\endgroup\deadcycles\z@\@@end}
  331.  
  332. \def\makelabels{\@fileswtrue}
  333. \def\@startlabels{}
  334.  
  335. \def\ps@headings{\headheight25pt
  336.    \def\@oddhead{\usebox{\firm} \hrulefill\ \@date\ \hrulefill\ 
  337.       \if@german Seite \else Page \fi\thepage}
  338.    \def\@oddfoot{}}
  339. \def\ps@empty{\def\@oddhead{}\def\@oddfoot{}\def\@evenhead{}\def\@evenfoot{}}
  340.  
  341. \def\ps@firstpage{\headheight36pt
  342.   \def\@oddhead{\parbox{\textwidth}{\usebox{\firmaddress}\par}}
  343.   \def\@oddfoot{}\def\@evenhead{}\def\@evenfoot{}}
  344. \def\ps@plain{\def\@oddhead{}\def\@oddfoot{\rm\hfil\thepage
  345.  \hfil}\def\@evenhead{}\let\@evenfoot\@oddfoot}
  346.  
  347. \parskip .7em \parindent 0pt \topsep .4em \partopsep 0pt \itemsep .4em
  348. \@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
  349. \@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
  350. -\@lowpenalty
  351.  
  352. \leftmargini 2.5em
  353. \leftmarginii 2.2em \leftmarginiii 1.87em \leftmarginiv 1.7em \leftmarginv 1em
  354. \leftmarginvi 1em
  355. \leftmargin\leftmargini
  356. \labelwidth\leftmargini\advance\labelwidth-\labelsep
  357. \labelsep 5pt
  358. \parsep 0pt
  359. \let\@listi\relax
  360. \def\@listii{\leftmargin\leftmarginii
  361.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep}
  362. \def\@listiii{\leftmargin\leftmarginiii
  363.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
  364.  \topsep .2em
  365.  \itemsep \topsep}
  366. \def\@listiv{\leftmargin\leftmarginiv
  367.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
  368. \def\@listv{\leftmargin\leftmarginv
  369.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
  370. \def\@listvi{\leftmargin\leftmarginvi
  371.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
  372.  
  373. \def\labelenumi{\arabic{enumi}.}
  374. \def\theenumi{\arabic{enumi}}
  375. \def\labelenumii{(\alph{enumii})}
  376. \def\theenumii{\alph{enumii}}
  377. \def\p@enumii{\theenumi}
  378. \def\labelenumiii{\roman{enumiii}.}
  379. \def\theenumiii{\roman{enumiii}}
  380. \def\p@enumiii{\theenumi(\theenumii)}
  381. \def\labelenumiv{\Alph{enumiv}.}
  382. \def\theenumiv{\Alph{enumiv}}
  383. \def\p@enumiv{\p@enumiii\theenumiii}
  384.  
  385. \def\labelitemi{$\bullet$}
  386. \def\labelitemii{\bf --}
  387. \def\labelitemiii{$\ast$}
  388. \def\labelitemiv{$\cdot$}
  389. \def\verse{\let\\=\@centercr
  390.  \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent
  391.  \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}
  392. \let\endverse\endlist
  393. \def\quotation{\list{}{\listparindent 1.5em
  394.  \itemindent\listparindent
  395.  \rightmargin\leftmargin}\item[]}
  396. \let\endquotation=\endlist
  397. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}
  398. \let\endquote=\endlist
  399.  
  400. \def\descriptionlabel#1{\hspace\labelsep \bf #1}
  401. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
  402.  \let\makelabel\descriptionlabel}}
  403. \let\enddescription\endlist
  404.  
  405. \def\theequation{\arabic{equation}}
  406.  
  407. \arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt
  408. \tabbingsep \labelsep
  409. \skip\@mpfootins = \skip\footins
  410. \fboxsep = 3pt \fboxrule = .4pt
  411.  
  412. \def\footnoterule{\kern-1\p@
  413.  \hrule width .4\columnwidth
  414.  \kern .6\p@}
  415.  
  416. \long\def\@makefntext#1{\noindent \hangindent 5pt\hbox
  417.  to 5pt{\hss $^{\@thefnmark}$}#1}
  418.  
  419. \c@topnumber=2
  420. \def\topfraction{.7}
  421. \c@bottomnumber=1
  422. \def\bottomfraction{.3}
  423. \c@totalnumber=3
  424. \def\textfraction{.2}
  425. \def\floatpagefraction{.5}
  426. \c@dbltopnumber= 2
  427. \def\dbltopfraction{.7}
  428. \def\dblfloatpagefraction{.5}
  429.  
  430. \if@german \else
  431.    \def\today{\ifcase\month\or
  432.       January\or February\or March\or April\or May\or June\or
  433.       July\or August\or September\or October\or November\or December\fi
  434.       \space\number\day, \number\year}
  435. \fi
  436.  
  437. \smallskipamount=.5\parskip \medskipamount=\parskip
  438. \bigskipamount=2\parskip
  439. \ps@plain \pagenumbering{arabic} \onecolumn \@fileswfalse
  440.